home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
SPACE 1
/
SPACE - Library 1 - Volume 1.iso
/
misc~1
/
664
/
bonus2.bas
(
.txt
)
< prev
next >
Wrap
Atari STOS Basic
|
1993-07-04
|
14KB
|
46 lines
1 VARNAME
10 CLS
100 GOTO
1000 FADE
1001 WAIT VBL
1002 FOR
1005 GOSUB
1010 FADE
11 VARNAME
12 PEN
13 REPEAT
14 UNTIL
15 INK
20 INK
30 FOR
300 SPRITE
40 GOSUB
400 FOR
401 VARNAME
402 IF
403 IF
404 IF
405 VARNAME
406 IF
407 MUSIC
408 VARNAME
50 REM *****************
500 VARNAME
5000 PEN
501 FOR
5010 LOCATE
502 RETURN
5020 LOCATE
5030 RETURN
60 SPRITE
70 IF
80 IF
90 IF
92 IF
93 IF
94 IF
95 IF
96 IF
97 IF
98 IF